Actually supply needed arguments.

diff --git a/lisp/vc.el b/lisp/vc.el
index 4008b2f80f6ba4eed3f3fde9c464f66083a00bfa..8e9d0469b2760c854244f6271eba4c28d11c2829 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2187,11 +2187,11 @@ outside of VC) and one wants to do some operation on it."
   
 (defun vc-generic-state (file)
   (let ((backend (vc-responsible-backend file)))
-    (vc-call-backend backend 'state)))
+    (vc-call-backend backend 'state file)))
   
 (defun vc-generic-status-fileinfo-extra (file)
   (let ((backend (vc-responsible-backend file)))
-    (vc-call-backend backend 'status-fileinfo-extra)))
+    (vc-call-backend backend 'status-fileinfo-extra file)))
 
 (defun vc-generic-dir-headers (dir)
   (let ((backend (vc-responsible-backend dir)))